home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Best of www.BestZips.com (Collector's Edition)
/
Best of WWW.BESTZIPS.COM Collector's Edition (JCSM Shareware) (JCS Marketing).ISO
/
grapprog
/
splt232w.zip
/
THP7595.ZIP
/
T7-5.BAS
< prev
next >
Wrap
BASIC Source File
|
1992-08-12
|
401b
|
15 lines
10 OPEN "T7-5.PLT" FOR OUTPUT AS #1
20 PRINT #1,"IN;SP1;SI.187,.269;PA-3000,1000;"
30 X=50
40 PRINT #1,"LB",X,X+1,X+2,+CHR$(3)
50 PRINT #1,"PA-3000,500;"
60 Y=50
70 PRINT #1,"LB";Y;Y+1;Y+2;+CHR$(3)
80 PRINT #1,"PA-3000,0;"
90 Z=50
100 PRINT #1,"LB";Z;"----";Z+1;"----";Z+2;+CHR$(3)
110 PRINT #1,"PA-3000,1000;WG20,0,360;"
120 PRINT #1,"PD-3000,0;WG20,0,360;"
130 PRINT #1,"SP0;"
140 END